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“ Smurse hasting var du hoolstrap-leuder voor Ohio Scsentific flannvy's 
dk iesdunm van de EPAGM FS5 715 





: Der eend zt “Dar Li gevang agter nn Zlghue EV MW 


Voor aile 6502 gebruikers die ftoppy-drives op hun computer willen aansluiten is deze source iisting een belangrijk hulp- 

middel, De fioppy disk-interface van Elektuur (november en-december 1982}, die met goedkope standaard-onderdelen is 

opgebouwd, werkt met de hier beschreven software; Ì 

De object code van de gegeven programma-listing kan in een 2708-EPROM (ESS 515} worden gezet. Het disk operating 

system Ìs van Ohio Scientific en heeft het typenummer OS-65D V3.1 of OS-65D V3.3. Op deze disketten staan verder een 

Microsoft-BASIC, een assembler, een extended monitor en-diverse andere programma's. 

De EPROM ES5 545 bevat diverse utility-programma's die via het hex-keyboard of door middel van een JS R-kommando 

kunnen worden opgeroepen: 

ZAD= FF17 <GOP{RUBOUT) Laden van het disk operating system van Ohio Scientific en van de Microsoft-BASIC- 
“interoreter van de diskette naar de junior computer. 

SAD> FF34 <GOP> (RUBOUT) Startadres voor toekomstige uitbreidingen. 

SAD> FFE2 SGO>{RUBOUT) Starten van een hulpprogramma voor het aanpassen van een OS-55D V3.1-diskette. 

ZAD> FFES GO (RUBOUT) Starten van gen hulpprogramma voor het aanpassen van een OS-65D V3.3-diskette. 

JSR FEA3 Print character-subroutine, 

JSR- FE18 Receive character-subroutine, 


RRADDIG ERK 


COMMANDS: 
RE AS 
PET EN 
LOAD FN 


SOURCE FILE: 4000 - 4003 
REQUIRED TRACK(S): Öl 


ENTER A FILE NAME: _ BOOTST 


FOR *BOOTST* IS (ARE) 12 TRACK(S) ON FLOPPY 
B*LO BOOTST. … " : ed 


BERE A 


***DOS ASSEMBLER*** 


THE OBJECT MODULE, oo ven 
WILL BE STORED AT SEG9G 
DO YOU LIKE TO CHANGE IT?Y 





ENTER OBJECT START ADDRESS: SD200 
Rn Been 
EDITOR? 


2kKPASS Zi 
EDITOR? 


LISTING ?Y 


JUNIOR'S ASSEMBLER 


di: 
On: 
Odd: 
dad: 
Ouds: 
09de: 
AGOT: 

DB: 
vjdd: 





8425 
OE: 
BOL: 
„028 
K029 

30: 
YÄ3l: 
PIEL: 
9933: 
dE34: 
3925: 
0836: 
BT: 
Ö038: 
0g39: 
3040: 
BO41: 
Ogar: 
0g43 
Ad44: 
9745: 
0946: 
A94: 
Bd48: 
Od4e: 
0959: 
AGS: 

352: 
0053: 
BA54: 
dg55: 
od56: 


… 


e 


FCO9 


FCO9 
FCO9 
FCO 
FCO9 


FCO9 
EFC9H 
FC88 
FCO8 


FCOg 
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ORG SFC@8 BOOTSTRAP LOADER 


SOURCE LISTING OF THE BOOT STRAP LOADER 
FOR ELEKTOR'S DOS JUNIOR COMPUTER OR ANY 
OTHER 6502 SYSTEM 


WRITTEN BY GUIDO DE CUYPER AND A, NACHTMANN 


DATE: 7 SEPTEMBER 1982 


THIS IS THE SOURCE LISTING OF THE MODIFIED HEX 
DISPLAY MONITOR OF "JUNIOR COMUTER BOOK 2" AND 
A BOOT STRAP LOADER FOR OHIO SCIENTIFIC SCHTWARE, 


SOME ADRESSES IN THE HEX DISPLAY MONITOR HAVE 
BEEN CHANGED. THE BOOTSTRAP LOADER HAS GOT 
TWO ENTRIES: A COLD START AND A WARM START ENTRY, 


THE PIA ON THE FLOPPY INTERFACE PC BOARD IS 


INITIALIZED BY A POWER UP AND CAN'T BE REINITIA- 
LIZED VIA THE RESET LINE! 


KAKDISPLAY BUFFERS *** 


INL * Sa0r8 

INH * INL +01 
POINTL * INH +01 
POINTH * POINTL +91 


KAATEMPS kk” 


TEMP + POINTH +91 
MODE * TEMP _ +01 
NIBBLE * MODE _ +81 
KEY * NIBBLE +01 


*RR6532 I/O AND TIMER**X 


PPORT A & PORT B 


PAD n SFA80 DATA REGISTER 


dab: 
AGAT: 
Ado8: 
Hd: 
HAT: 
OAT: 
2872: 
2073: 
H074: 
BES: 
dAT76: 
BATT: 
yi 8: 
HA79: 
d08d: 
gal: 
Hg: 
ZA83: 
084: 
BBS: 





ve: 
AU8B: 
GOL: 
Add: 
gol: 
BI: 
A3: 
DI: 
4Ĳ95: 
0396: 
Big: 
4398: 
Par: 
digd: 
8101: 
G132: 
419: 
OLd4: 
105: 
156: 
A1g7: 

08: 
uid9: 
Bil: 
Bill: 


BIZ: 





reid 
FCO 
FCIG 





FCO 
PCÓg 
FCög 
Fey 


FCO 
FC 
FCOd 


ER) 


FCO9 
FCOY 
ECOg 
FCO9 


FCO9 
FCOg 
FC69 


FCS 


CNTA 
CNTB 
ECNTC 
CNTD 


>WRITE 


CNTE 
CNTF 
CNTG 
CNTH 


K*KINT 


NMIL 
NMIH 
TRO 


ee ES Sef 


IROH 
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Rd 


EDGE D 


KO OH Ok 


T 
Tt 
ad 
ai 
zo 
mi 


COUNT 


et Ok 


COUNT — 


vt 


ERRUPT 


% Ot & 


_$FAFC. 
_S$FAFD 


PAD +AL DATA DIRECTLON 
PAD +2 DATA REGISTER 
PAD +43 DATA DERECTIGN 


ETECT CONTROL 


SFAEA NEG EDET DISABLE PAT IRO 
SFAES POS EDET DISABLE PA] IRQ 
SFAEG NEG EDET ENABLE PA7 IRQ 
SFAE] POS EDET ENABLE PA? IRQ 


EGISTER, CLEAR TIMER & IRQ FLAG 


PADS  BiTG=PAJ FLAG, BIT7=TIMER FLAG 


INTO PIMER, DISABLE TIMER IRQ 


SFAF4 CLKAT 

SFAES  CLKBT 

SFAF6G CLK6G4T . 
OLRIKT 5 


SFAF7 


INTO TIMER, ENABLE TIMER IRQ. 


CLKAT 
CLK8T 
CLK64T 
CLKIKT 


SFAFE 
SFAFF 


< 
u 
@ 
3 
0 
pel 
u 
a 

s 

“ 


KKKRAM IN THE 6532: SFA, ,.SFAJIFK*R 


*RAGS22 VIA ON JUNIOR!'S INTERFACE BOARD **E 


> 6522 REGISTER FILE 


ORB 
ORA 
DDRB 
DDRA 


Hok ok * 


SEB 
SF801 
SE842 
SEF303 


CONTROLS HANDSHAKE 


JUNIOR'S ASSEMBLER 





PCOG 


FC 


FCUö 


FCOY 


FCO 
FCO9 
FCOg 
Feng 
PCG 
ECHg 


EC 
FCY 
FC9@ 
FCOY 


ECOÚ 
FC2g 


TALL % SF894 WRITE INTO LOW ORDER LATCH OP TILL 
READ Tì LOW ORDER COUNTER AND CE} 
RESET Tl INTERRUPT FLAG 


TACH * SE895 WRITE INTO HIGH ORDER LATCH OF TI 
WRITE INTO HIGH ORDER COUNTER OE T] 
TRANSFER LOW ORDER LATCH INTO LCW 
ORDER COUNTER AND RESET Tì INPERR, 
FLAG, 
READ Tl HIGH ORDER COUNTER 

TAALL * SF806 WRITE INTO LOW ORDER LATCH OF Ti 
READ Tl LOW ORDER LATCH 

TAALH % SF897 WRITE INTO HIGH ORDER LATCH OFTI AND (2) 
RESET INTERRUPT FLAG OF TI 
READ Tl HIGH ORDER LA'TCH 

TBLCL * SF898 WRITE INTO T2L=L 
READ T2C-L AND CLEAR T2 INTERR, 
PLAAG. 

TBCH 5 SF899 WRITE INTO T2C-H AND(!\ TRANSFER T2L-L 
TO T2C-L AND(!) CLEAR INTERR, 
FLAG 
READ T2C-H 

SR li SF8GA SERIAL PORT 

ACR id SF80B AUXILIARY CONTROL REGISTER 

PCR 8 SFB8OC PERIPHERAL CONTROL REGISTER 

IFR * $SF80D INTERRUPT FLAG REGISTER 

IER n SF89E INTERRUPT ENABLE REGISTER 

ORAA * SF8JF OUTPUT REG, A, NQ EFFECT ON HANDSHAKE 


kkk kkk kkk kkk kk kkk kkk Rekkie keke kad 


*KKADDRESSES OF THE FLOPPY INTERFACE BOARD**& 
KkkAAAAAAkKAAAhkkkkAAh AR kkkkkhkkkkkikkkkkkkkek 


***PIA ADDRESSES (6821) *** 


DRA ” SCOEY DATA/DATA DIRECTION REGISTER A 
CRA % SCOYÌ CONTROL REGISTER A 
DRB n SCOZ2 DATA/DATA DIRECTION REGISTER B 
CRB 8 $SC4G3 CONTROL REGISTER B 


KKKACIA ADRESSES (685) *** 


CACIA * SCO1G ACIA CONTROL REGISTER 
DACIA * SCEÌl ACIA DATA REGISTER 




















de ze 4 


Ds 
bet ER 4 
ze 


Pt 


Ke, 


he] 
2 
Lj 
al 
5: 


KAROTPHER FLOPPY 1/0 ADDRESSES t#* 


PBIT 


CNTLX 





KERNEL 
AHOLD 
MON 
LODVEC 
KPDG 


SETTK 
MEMHI 
MEMLO 
LDHEAD 
READDK 


be 


INLD 
ETOR 
STRO! 


u: 
SEE 


u: 
en 


z 
Che ES 
ri 


ax 
: 
„3 


LD 
ac 
Sn 
8 


NM 


INVEC 
INVECA 
JT VEC 


3 
OUTVCA 


HEX 
RESET 


LDAIM. SLE 
STA P5DD 
LDAIM SGL 


% SFA59 AMOUNT OE STOP BITS 
* SFASA COUNT DOWN REGISTER 
x SFASR 

* SPASC … COUT DOWN REGISTER/ZD 
« SEABUD 

* SFASE CURRENT COUNT RECTSTER 
“ SFASF à 

* SFA6H 

n SPAG] 

* SFA6G2 

A SPAIC 


51 KERNEL COMMAND INT RPRETER 

& 52363 DÓS CHARACTER STORE : 

* SPCGY SAVE ENTRY TO: BEX DISPLAY MONITOR 

* ___ SÚYPEFD . LOAD VECTOR FOR THE BOOTSTRAP LOADER 

* 82325 KEY DEPRESSED. DURING OUPPUP (CTL-C) 
SYSTEM IS BOOTED UP 









* S26BC MOVE THE HEAD ON TRE TRACK IN ACCU 

* SOOFP FLOPPY LOAD POINTER ein & 

_% „MEMHI 8 

in "S2754 DO A HEA AD LOAD Ô ON 

* $2967 READ THIS TRACK INTO MEMORY POINTED 
‚ BY THE LOAD POINTER MEMHI,MEMLO 

* S2761 UNLOAD THE HEAD. 

* $29C6" SET FOR DRIVE IN ACCU 


ee 82073 PRENT. THE STRING FOLLOWING THE JSR INSTR, 
THE STRING HAS TO BE TERMINATED BW 
SJJ, AFTER THE STRING IS PRINTED 
_ THE INSTRUCTION JUST BEHIND 500 
mt IS. EXECUTED! ne 
S2iel INPUT DISTRIBUTOR 


ss 

* INDST” #BTY OUTPUT DISTRIBUTOR 

k S2ACG AN OTHER: DISTRIBUTOR 

n S205E PRESENT SECTOR NUMBER 

* $2301 VECTOR FOR: THE PRINTER INPUT 
® INVEC +42 ZND INPUT DEVICE 

% S23211 VECTOR FOR THE PRINTER OUWPUT 
“ OUTVEC +82 2ND OUTPUT DEVICE 

* $26A3 STEP RATE DELAY 


DISPLAY MONITOR**E 


PBl...PB4 15 OUTPUT 
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A48: 
BEAT: 
025ö: 
g251: 
B252: 
8253: 

254: 
255: 
0256: 
9257: 
0258: 
259: 
2260: 
g26l: 
ARA: 
g263: 
O264: 
g265: 
266: 
9267: 
0268: 
g269: 
8270: 
9271: 
0272: 
0273: 
2274: 
0275: 

276: 
H277: 
2278: 
279: 
0288: 





j CQ 
Dg 
A2 


D8 
6C 


ca 
Dg 
A9 
85 
Dg 


Ei 
Dg 
A9 


Fo 


c3 
D9 
E6 
Dg 


56 


4C 


° 
Dg 
4C 


C9 
18 


85 
A4 
Dg 
Bl 


5 FD 


FE 


FB 


TE PE od "Zj ed 
FAO W ODO 


13 
B 
Fr 


FA 
19 


J1 
FD 
14 


3 
L 


96 
9 
FD 
JA 


12 
g9 
FA 
92 
FB 


OD 


14 
g3 
FD 


15 
F2 


FF 
FD 
gp 
FA 


FC 


EC 


FC 


FC 


9 


FC 


FE 


START 


STARTA 


STARA 


*KKCOMMAND FILTER**X 


GOEXEC 


ADMODE 


DAMODE 


STEP 


STEPA 


PCKEY 


ILLKEY 


DATA 
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STA 
LDXIM 
TXS 
SEI 


CLD 


JSR 
BNE 


JSR 
BEQ 
JSR 
BEOQ 
JSR 


CMPIM 
BNE 
LDXIM 
TXS 
CLD 
JMI 


CMPIM 
BNE 
LDAIM 
STA 
BNE 


CMPIM 
BNE 
LDA IM 
STA 
BEOQ 


CMPIM 
BNE 
INC 
BNE 
INC 


JMP 


CMPIM 
BNE 
JMP 


CMPIM 
BPL 


STA 
LDY 
BNE 
LDAIY 


MODE 
SFF 


SCAND 
STARTA 


SCAND 
STARA 
SCAND 
STARA 
GETKEY 


s13 
ADMODE 
SFF 


POINTL 


S1g 
DAMODE 
sg 1 
MODE 
STE PA 


S11 
STEP 
sgg 
MODE 
STE PA 


S12 

PCKEY 
POINTL 
STE PA 
POINTH 


START 


$14 
ILLKEY 
GOKERN 


S15 
STEPA 


KEY 
MODE 
ADDRES 
POINTL 


SET ADDRESS MODE 


INITIALIZE THE STACK POINTER 
DISABLE IRQ 


DO YOUR JOB IN BINARY MODE 


SCAN DISPLAY 
WAIT UNTIL KEY IS RELEASED 


SCAN DISPLAY AND DEBOUNCE 
IS ANY KEY DEPRESSED? 
DEBOUNCE AGAIN 


BRANCH ON ERROR 
RETURN WITH KEY 


VALUE IN ACCU 
GO KEY? 
SET THE STACK POINTER 


JUST IN CASE 
GOTO ADDRESS POINTED BY THE DISPLAY 


AD KEY? 


SET ADDRESS MODE 


DA KEY? 


SET DATA MODE 


+ KEY? 


POINT=POINT+1 


PC KEY? 
GOTO KERNEL COMMAND INTERPRETER 


ILLEGAL KEY 
IF YES IGNORE IT 


Y=9 IS DATA MODE, ELSE ADDRESS MODE 
GET DATA SPECIFIED BY POINT 


JUMNIGR'S ASSEMBLER PAGE 06 


Bal: FCDF A ASLA 
D282: FCOÛ ÚA ASLA 
4283: FC6l GA ASLA : 
B2Bd: PC62 DA ASLA ‘SHIFT LOW ORDER NIBBLE TO THE LEEFT 
B228S: FCO3 95 PF JRA KEY KEY VALUE IS NOW LOW ORDER WIBELE 
9286: FC6S A1 FA STAIY POÏNTL MOVE DATA TO MEMORY 
ART: FPC6T 4C 49 FC JMP __STEPA … 
ADDRES LDXIM $44 DO 4 SHIFTS. 


ADLOOF ASL POINTL SHIFT POINTH,POINTL TO THE LEFT 
ROL POINTH ’ . ë 
DEX 
BANE ADLOOP 
LDA POINTL Ì 
ORA KEY THE KEY VALUE IS THE LOW ORDER ADDR, NIEDBLE 
STA POINTL. ë 
JMP STEPA 





*AKSUBROUTINES OF THE. HEX DISPLAY MONITOR*** 










Br: ____ _SCAND ÏS A SUBROUTINE SHOWING THE DATA SPECIFIED BY 
EARA: POINT, : 

Oras SCANDS SHOWS THE CONTENTS OF THE DISPL. BUFFERS 
dig: POINTH,POINTL AND ENH ON THE 7-SEGMENT DISPLAYS, 
8307: THE SUBROUTINE AK SCANS THE KEYBOARD, IT IS AUrO- 
0308: MATICALLY CALLED VIA:SCAND OR SCANDES, AK RETURNS 
3350: “WITH A=g IF NO KEY IS DEPRESSED AND RETURNS WITH 
is: A<DÛ IF A KEY IS DEPRESSED. 

Uti: WHEN SCAND OR SCANDS ARE LEFT, PORT A IS AN INPUT 
9312: PORT. 

Û213: : 

A34: 

315: FCIC A} 09 SCAND LDYIM $48 

D316: FCTE Bl FA LDAIY POINTL' GET DATA. FROM MEMORY 

9317: FC8@ 85 F9 STA _INH «STORE DATA IN THE DATA BUFFER 
B218: 
D319: FCE2 A9 IF SCANDS LDAIM: S7F FAU...PA6. IS OUTPUT 

9329: FCB4 8D 81 FA STA PADD drie 

321: FC87 A2 08 LDXIM' $08 ENABLE DISPLAY 

8322: REN dr ze a 

9323: FC89 A5 FB SCDSA LDA POINTH OUTPUT POINTH 

H324: FCBB 29 B8 FC “ JSR SHOW te 

d325: FCB8E A5 FA LDA —_ POINFE OUTPUT POINTL 

0326: FC38 28 B8 FC JSR SHOW 

B327: FCI3 A5 F9 LDA INH OUTPUT -INH 

D328: FC9I5 20 B8 FC ISR « SHOW ad 

8229: EE mep Ee 

334: FCB A9 99 SCDSB LDAIM S90 PAQ...PAT IS :INPUT 

G33i: FCOA 8D 81 FA STA _ PADD : : 

4332: 8 

6333: FC9D A3 3 AK LDYIM 593 SCAN: 3 KEYBOARD ROWS 

4334: FCF A2 09 LDXIM $09 _ RESET ROW _ COUNTER 

8335: : En tn eel 


9336: FCAl A9 FF ONEKEY LDAEM SEE 


re 


2 






en rj 


rem el 


CAD EL 


N 


reg tr ej ij 


OD 
TC 


EN, 








FC 








53 48 
8D 8d 
3 





82 
5 
E 
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AKA STX PBD OUTEUT ROW NUMBER 
INZ ENABLE FOLLOWING ROW 
NX 
AND PAD INPUT ROW PATTERN 
DEY ARE ALL ROWS SCANNED? 
BNE AKA 
LDYIM 546 TURN DISPLAY OFF 
DE PBD 
CRAIM 589 
EORIM SFF INVERT KEY PATTERN 
RTS 


THE SUBROUTINE SHOW DISPLAYS THE CONTENTS 
OF ANY DISPLAY BUFFER ON THE 7-SEGMENT DISPLAY. 
TRE X REGISTER IS USED AS A DISPLAY POINTER 





SHOW PHA SAVE CURRENT BYTE 
STY TEMP SAVE Y REGISTER 
LSRA GET HIGH ORDER NIBBLE 
LSRA 
LSRA 
LSRA 
JSR CONVD OUTPUT HIGH ORDER NIBBLE 
PLA GET BYTE AGAIN 
ANDIM SOF MASK OFF HIGH ORDER NIBBLE 


JSR CONVD OUTPUT LOW ORDER NIBBLE 
LDY TEMP RESTORE Y REGISTER 


RTS 


THE SUBROUTINE CONVD DOES A BYTE TO 7=SEGMENT 
CONVERSION, 


CONVD TAY USE NIBBLE AS INDEX 
LDAY LOOK FETCH SEGMENT PATTERN 
STA PAD OUTPUT SEGMENT PATTERN 
STX PBD OUTPUT DISPLAY ENABLE 
LDYIM SFF DELAY A BIT 


DELAY DEY 
BNE DELAY 


DEY TURN THE SEGMENTS OFF 
STY PBD 

INX ENABLE NEXT DISPLAY 
INX 

RTS 


GETKEY RETURNS WITH THE VALUE CF A DEPRESSED 
KEY IN THE ACCU REGISTER.IF AN INVALID KEY 
WAS DEPRESSED, IT RETURNS WITH $15 IN ACCU, 





Zh 


zr 


kel 
TEL 
“< 
bed 
z 

5 










RI WW 
nn 


ke is, 


is FCF3 BA KEYINB XA 
2: FCFA 29 JE 
SAL: ECEFC 4A Lis 
dr FEFD AA 
” 
E 
pe 


Een hee jet ie 
20 


ere 
vj mj 
vj mj 
te 
5 
Ks] 
Dr) 


KEYINC € 


LOOK 


HH 


ü 


1 


ED hr 


&: 
MD Dd CO Et 1 
Û 


ke 


KR RN de 


Hú 


PAGE 


js 
Cu my 

wed 

nd 


TI 


u De 
ii 


5 


mij 





ANDIM 
TAX 
98 TYA 
BPL 


AD 
KEYIND DEX 


aNE 
RTS 


E/ 
ee) 
ze 


S81 
ONEKEY 
KEYIN 


KEYINB 


KEYINA 


SJF 


KEYING 


SâÛ 
$79 
S24 
539 
S19 
$12 
$g2 
s78 


„Sig 


Sl 
sg8 
Sj 
S46 
S21 
Sg6 
SE 


START AT 


tt 


: 
t 


BO Od DUI de 


OU 





ONE ROW 


THEN NO KEY DEPRESSED 


ALL ROWS SCANNED? 


ze 


HERE IF ILLEGAL KEY 


MASK MSD. 
DIVIDE BY 2 


ADD ROW DISPLACEMENT 


JUNIORS S 


ED 
De 
Se 


bel 
LT oe 


En 0e 
Ti 


Si 
En 
Eh U UA AAS 


Se 


Ee 
CT EE Ul ker WD LD 
en en en en ve en er 


iu ze 
Cn 








d4A58: 
D&D: 
Bae: 
G462: 
g&o4: 
Za6GS: 
g466: 
Zäo7: 
g468: 
g469: 
PAT: 
A47 
2472: 
BAT: 
GATA: 
gas: 
BANE: 
ENNE 
28: 
Bag: 
O4gd: 
ZAB8l: 
9482: 
9433: 
nagá: 
gags: 
9486: 
0487: 
4488: 
G48I: 
Z430: 
491: 
D492: 
u493: 
dáâd: 
„495: 
B45 16: 
S407: 
g428: 
“493; 
A: 
S5l: 
GSB: 
0583: 
D5dd: 


ze 


.. 


. 


Re 


2 rj 
vu 
EW ow 





FD25 
FD2A 
FD2D 
FD2E 
FD32 
FD34 
ED37 
ED39 
FD3C 
FD3E 
FD4l 
FD44 
EFED45 
rD48 
FD4E 
FD4E 


FD4F 
FD51 


FD53 
FD55 
FDSö8 
FDDA 


FDSC 
FOSF 
FD62 
FD64 
FD67 
FD6A 
FD6C 
FD6F 
FD/1 
FD74 


ED76 
ED78 
FD7B 


RS 
ASSE 


20 
6C 





AQ 
8 


Ad 


A9 


PC 


ee Nr 
Eg 
A9 


8D 
20 
29 
BD 
zg 
go 
85 
A2 
28 
Eg 


A2 
85 


20 D 


kg 
ie £ 


MBLER 


vj te 
TJ 


28 


AF 


7 


3 
TU 


Cg 


DKBOOT 


KRAINITIA 


SIGMA 


KKSUBROUTINE 


INIDSK 


BOOT 


STEPLO 


TRKO 


INDEXP 
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s 
SSR 


JMI 


JSR 
JSR 
JSR 
RTS 


LDYIM 
STY 
LDA IM 
STA 
LDA IM 
STA 
LDA IM 
STA 
LDXIM 
STX 
STY 
DEY 
STY 
STX 
STY 
RTS 


LDA IM 
BNE 


LDA IM 
BIT 
BEQ 
LDA IM 


STA 
JSR 
ANDIM 
STA 
JSR 
ORA IM 
STA 
LDXIM 
JSR 
BEOQ 


LDXIM 
STX 
JSR 


LIZE 


SIGMA 
LODVEC 


INITIALIZE THE Ee i/ 
CONTINUE EKECUPION VLA THE LOAD VECTOR 


THE DOS COMPUTER I/O *** 


INIDSK 


INITIALIZE TRE 6821 PIA 
INITIALIZE THE 6532 PIA { 
LOAD TRACK @ FROM TRE DISKET 








S OF THE BOOTSTRAP*EX 


s09 





Sai 
DRA 
sa4 
CRA 
S49 
DRA 
Só4 
CRA 
CRB 


DRB 
CRB 
DRB 


SFB 
TRKO 


Sg2 
DRA 
INDEXP 
SEF 


DRB 
DUMMY 
SF 7 
DRB 
DUMMY 
508 
DRB 
$18 
FDELAY 
STEPLO 


SIE 
DRB 
DELA Y 


SELECT DATA DIRECTION REGISTER Á 


SELECT DATA REGISTER A 
SELECT DATA DIRECTION 
Y=PF 

PORT B IS TOTAL OUTPUT 
SELECT DATA REGISTER B AGAIN 
SET ALL OUTPUTS HIGH 


REGISTER B 


FOR STEP IN DIRECTION 
BRANCH ALWAYS 


LOAD MASK PATTERN 

ARE WE ON TRACK ZERO? 

IF YES, DO INDEX TEST 
TOGGLE BITS FOR STEP OUT 


STORE IN PIA 
DELAY SOME CYCLES 
CLEAR STEP BIT 


DELAY SOME CYCLES 
SET THE STEP BIT 
AND OUTPUT IT 
DELAY VALUE 

WAIT A MOMENT 

TRY IT AGAIN 


RESET HEAD LOAD BIT 
HEAD LOAD 
WAIT A MOMENT 


JUNIOR!'S ASSEMBLER 


9595: EFDVE 
8566: FDBi 
4507: 
258: FD33 
7549: FD86 
A51: FD88 
Sil: EFD8A 
S12: FDBD 
4513: EDSF 
5 

















DENG: 
4518: 
4519: 
ABR: 
BEZ: 
Z522: FDAZ 
d523: 
G524: FDAá4 
H525: FDA7 
9526: FDA9 
G527: FDAA 
9528: FDAC 
B529: FDAE 
B53ĳ: EFDBQ 
OE3Ì: FDB2 
O537: DBA 
55 FDB6 
„34: FDB9 
ei FDBA 
53 FDBC 
54: FDBD 
A1 EDBE 
G542: FDCÌ 
9543: FDC2 
G544: FDC4 
#545 
dad6: 
0547: FDC5 
2548: FDC8 
g549: FDC9 
2558: FDCB 
8551 
552: ERCE 
9553 
gE54 
3555 
556: 
Goh: FDCF 
4558: FDD 
O55G: FDDÌ 


0560: FDD3 


ut sa 


U 
EE 
KS 





FD 


86 


8D co 


6% 


1 


AD 1Ì 


Cg 


Cg 


D& 
57 
82 


A5 
BD 


INDEND 


RPAGE 


FDELAY 


FDELA 


RBYTE 


DUMMY 


LPA 
EMI 


LDA 
BPL 
LDA IM 
STA 
LDA IM 
STA 
JER 
STA 
TAX 
JSR 
5'TA 
JSR 
STA 


LDYIM 


JSR 
STAIY 
INY 
BNE 
INC 
DEC 
BNE 
STX 
LDA IM 
STA 
RTS 


LDY IM 


DEY 
BNE 
EORX 
DEX 
BNE 
RTS 


LDA 
LSRA 
BCC 
LDA 


RTS 


DRA 
INDBEG 


DRA 
INDEND 
Sj 3 
CACIA 
$58 
CACIA 
RBYTE 
LODVEC 


REYTE 
LODVEC 
RBYTE 
SOGEF 


REZ 
2d 


RBYTE 
LODVEC 


RPAGE 
LODVEC 
SOOFF 
RPAGE 
LODVEC 
SFF 
DRB 


SF8 
FDELA 
SOOFF 


FDELAY 


CACIA 


RBYTE 
DACIA 


GET DISK STATUS 
LOOP TILL INDEX START 
GET DISK STATUS 
LOOP TILL INDEX END 

RESET ACIA 

INITIALIZE ACTA FOR 

8 BIT EVEN PARITY, DIVIDE BY 
GET FIRST BYTE FROM DISKETTE 
+Oi SAVE HIGH START ADDRESS 


1 RÀ 


SAVE IT FOR LATER USE 
GET SECOND BYTE 


SAVE LOW START ADDRESS 

READ THIRD BYTE FROM DISKETTE 
SAVE THE AMOUNT OF PAGES WESRE 
FROM DISKETTE (PAGES/TRACK} 
INITIALIZE LOAD POINTER 


GOING TO RE 


READ A BYTE FROM DISKETTE 
AND STORE IT IN MEMORY 


SET UP FOR NEXT MEMORY LOCATION 
LOOP TILL A PAGE IS READ 

+BÌ ADJUST LOAD VECTOR 

DECRMENT PAGE COUNTER 

LOOP TILL ALL PAGES ARE READ 
+ÄÌ RESTORE LOAD VECTOR 


UNLOAD HEAD 


LOOP A BIT 
DUMMY INSTRUCTION 
ADJUST TIMER COUNT 
LOCP TILL TIME OUT 


GET ACIA STATUS 

RECEIVER BIT IN CARRY 

LOOP TILL RECEIVER BUFFER IS FULL 
GET DATA BYTE FROM ACIA 


KEKINITIALIZE THE TERMINAL*** 


INITPR 


CLD 
SEI 
LDA IM 
STA 


567 
PED 


DISABLE INTERRUPTS 
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O56l: FDDG6G A9 29 LDA MM 596 
H562: FDD8 2D 88 FA STA PAD 
0563: FDDB A2 FC LDXIM SFC YOUR EPSON LIKES THIS SPEED 
E564: FDDD 8E 5A FA STX CNTEX 
9565: FDEG A2 FF LDXIM SEF 
#566: FDE2 E&R 58 FA STX CNTHX 

567: FDES EA NOP 

„68: FDEG A3 JF LDAIM SAE 

56 : FDES 8D 8l FA STA PADD SET BATA DIRCTION 

jd FDEB 4A LSRA 
57: FDEC BD 83 FA STA PBDD SET PORT B FOR EPSON BUSY ON PBS 
H572: FDEF A2 93 LDXIM SO3 
B57Z: FDFÌ 8E 59 FA STX STPBIT TRANSMIT NO PARITY BUT 2 STOP BITS 
Z5r4: 
BATE: FDF4 2C 89 FA STRTBT BIT PAD WAIT FOR A START BIT 
ABTE: FDF] 30 ER BMI STRTBT 
U57: FDEFS 20 4E FE JSR COMTIM COMPUTE THE START BIT TIME 
4578: FDEC 4E 5E FA LSR TIMH DIVIDE BY 2 
579: EFDFF 6E 5E FA ROR TIML 
OA8U: FEG2 AD BE FA LDA TIML 
9581: FEZ5 8D 5C FA STA CNTHL SAVE HALF START BIT TIME 
GA32: FEGB8 AD SF FA LDA TIMH 
Wo82: FEOB 8D 5D FA STA CNTHH 
O58A: FEJE A2 Gä LDXIM S$Y8 
„585: FEÌS 29 72 FE JSR DELHBT 
0586: FEI3 20 2B FE JSR RECD GET THE REST OF THE CHARACTER 
UER/: FEI6 C3 IF CMPIM S7F WAS IT A RUBOUT CHARACTER? 
9588: FEL8 D9 B5 BNE INITPR IF NOT, THEN TRY IT AGAIN 
"586: FELA 69 RTS 

„sr 
4581: 
95e: 
45935: KKKRECEIVE A CHARACTER FROM TERMINAL*E* 
g594: 
05395: FEB 2C 84 FA RECCHA BIT PAD WAIT FOR A START BIT 
0590: FEIE 30 FB BMI RECCHA 
4597: FE2D BE 61 FA STX TEMPB SAVE X 
Ü5S98: FE2Z3 A2 08 LDXIM 548 WE RECEIVE 8 BITS 
0599: FE25 20 72 PE JSR DELHBT DELAY FOR HALF BIT PIME 
0680: 
U6AÌ: FE28 29 81 FE RECA JSR DELBIT DELAY FOR ONE BIT TIME 
BEI: 
9693: FEZB 2C 84 FA RECD BET PAD ONE/ZERO CHECK 
O6G4: FEZE 14 99 BPL RECB BRANCH ON ZERO 
G6P5S: FE3Z 38 SEC IT IS A '1' 
HE6Y6: FE3i GE 62 FA ROR CHA ROTATE CARRY iNT CHARACTER 
GEA: FE34 CA DEX SET UP FOR NEXT BIT 
0608: FE35 DO F1 BNE RECA ARE ALL BITS READ? 
B609: FE3/ FO 47 BEQ RECC 
deld: 

Sll: FE39 18 RECB CLC IT IS A '4' 

oi2: FE3A GE 62 FA ROR CHA 
613: FE3D CA DEX 
golâd: FE3E DJ E8 BNE RECA 
gel5: 


BeLS: FE RECC JSR DELBIT WAIT FOR THE STOP BIT 


mj 
nj 
dn 
SS 
ho 
St 
on 
Na 
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dolt: 
BELB: 
doig: 
g62d: 
BE21: 
dor: 
523: 
n2â: 
U625: 
de , 
Beer: 
HERZ: 
H629: 
d63ú: 
BOL: 
Gozer: 
HE3T: 
Öo4: 
d53E: 
Bo36: 
go37: 
GEE: 
ú630: 
2640: 
g64l: 
DE42: 
g6ä3: 
do44: 
Z645: 
E46: 
BOAT: 
d648: 
g643: 
ges d: 
desi: 
0652: 
g653: 
ge5á: 
9655: 
n6S6: 
B657: 
9658: 
ge5s: 
g660: 
0661: 
deLZ: 
4603: 
9664: 
Ö665: 
9666: 
G667: 
3668: 
g669: 
BETA: 
267: 
2672: 





ASSEMBLER 
FE43 AD 62 FA 
PE46 29 IF 
FE48 8D 63 23 
FE&B AE 6l FA 
FE4E 59 


mm mr rg PT 
Sm en Me 1 
HA UI in Lt UI IN 
UW WW UI 


Ala U 


FE6E 
FE71 


FE72 
FES 
FES 
FE? 

FEJ7E 
FEJF 


en 
t 


1 


7 
Á 


FE8L 
FE84 
FE87 
FE8A 


3 
2 


ta 
cj 


mj +5 Mij 
me £ 
WOO MW 


Kal bes [Ei 


FE96 
FE93 
FE9B 
FE9E 
FEIE 
FEAG 
FEAZ 






Fes 
0 


me 


wi 


ou gy 


nj 


3 


ed AP a ON 


B 
Te € 


Ao FP 0 
ev UT 


Am 
En 
AD 
2D 
38 
Bj 


AD 
BD 


AD 


5D 


38 
AD 


Sm 


Die 
AD 
ES 
8D 
EA 
EA 
B 
Gj 


B 
oF 


5E 


d1 
5E 
BE 
9 
5E 


FA 


FA 


FA 
FA 


FA 
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LDA 
ANDIM 
STA 
LDX 
RTS 


CHA 
STE 
AHOLD 
TEMPB 


LOAD CHARACTER IN ACCU 
MASK OFF BIT 7 

SAVE CHARACTER FOR DOs 
RESTORE X 


KERCOMPUTE BIT TIME**X 


COMTIM CLC 
LDA 
ADC IM 
STA 
LDA 
ADC IM 
STA 
BIT 
BPL 
LDA 
STA 


En 


STA 
RS 


CNTLX 
Sg 
CNTLX 
CNTHX 
Sag 
CNTHX 
PAD 
COM TTM 
CNTLX 
TIML 
CNEEX 
TMR 


BIT ADDITION 


iet 
5 


IS START BIT FINISHED? 


SET UP FOR HALF BIT TIME COMPUTATTON 


FRKDELAY A FULL/HALF BIT TIME**X 


DELHBT LDA 
STA 
LDA 
STA 
SEC 
BCS 


DELBIT LDA 
STA 
LDA 
STA 


CNTDN SEC 
LDA 
SBC IM 
STA 
LDA 
SBCIM 
STA 
NOP 
NOP 
BCS 
RTS 


CNTHL 


TIML 
CNTHH 
TIMH 


CNTDN 


CNTLX 
TIML 
CNTHX 


TIMH 


TIML 
Sq1 
TIML 
TIMH 
sgg 
TIMH 


CNTDN 


FETCH HALE BIT TIME 


BRANCH ALWAYS 


FETCH FULL BIT TIME 


16 BIT SUBTRACTION 


EQUALIZE 4 MICRO SECONDS 
TIME OUT? 


K*ADRINT THE CHARACTER IN ACCU *#Z 






64 FA PRCHA STX TEMPA SAVE X 
52 FA STA CHA SAVE CHARACTER 
82 FA CTS LDA PBD GET PIA DATA OF 4532 
4j ANDIM S49 MASK EPSON BUSY BIT 
F9 BNE CTS LOOP IF PB5 IS HIGH 
> 82 FA LDA PBD 
FE ANDIM SFE TRANSMIT START BIT 
82 FA STA PBD 
Bl FE JSR DELBIT DELAY ONE BIT TIME 
FERB A2 @7 LDXIM $97 TRANSMIT 7 DATA BITS 
FEBD 4E 62 FA PRA LSR CHA SHIFT OUT CHARACTER 
FECH 99 3E BCC PRC BRANCH ON ZERO 
FECZ AD 82 FA LDA PRD 
FEC5 99 41 ORAIM Sl OUTPUT A ONE 
FEC? 8D 82 FA STA PBD 
FECA 22 81 FE PR3 JSR DELBIT DELAY ONE BIT TIME 
695: FECD CA DEX SET UP FOR NEXT BIT 
966: FECE DO ED BNE PRA ARE ALL RITS TRANSMITTED? 
9037: FEDY AE 59 FA LDX STPBIT GET AMOUNT OF STCPBITS+1 
0698: 
geIJ;: FED AD 82 FA PRD LDA PBD 
AID: FEDG 99 G1 ORAIM S@1 FIRST NONE PARITY 
ATÓLs: FED& 8D 82 FA STA PBD AND THE STOP BiTS 
POE: PFEDB 29 81 FE JSR DELBIT 
PIG: FEDE CA DEX 
OTPA: FEDF DO F2 BNE PRD 
9745: FEEL 2C 89 FA BIT PAD CHECK IF BREAK KEY IS DEPRESSED! 
76: FEE4 18 94 BPL BRKTST 
0747: FEEG6G AE 69 FA LDX TEMPA RESTORE X 
D7A8: FEES 60 RTS 
OTR: 
O1: FEEA 2C 84 FA BRKTST BIT PAD IS THE BREAK KEY ACTIVE? 
OPil: FEED 19 FB BPL BRKTST 
ZI12: FEEF 6C 7C FA JMI BRKT JUMP VIA AN USER SELECTABLE VECTOR 
713: 
Br14: 
U715: FEF2 AD 82 FA PRC LDA PBD 
9716: FEF5S 29 FE ANDIM SFE OUTPUT A ZERO 
OI1): FEF/ SD 82 FA STA PBD 
9718: FEFA 18 CLC 
4719: FEFB 99 CD BCE PRB BRANCH ALWAYS 
O2: 
BI21: 
OZ: 
3723: 
124: 
A25: 
g726 
027: KkkkkkkkkkARAkkAkkAkkkkkkkkkRk 


8728: **KWARM START ENTRY FOR DOS *** 
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kkkEkAARAAARAkhkAKkAkAK KAAK H 


GOKERN JSR RESTTY RESET PRINTER 1/0 
JMP KERNEL AND GOTO DOS KOMMAND INTERPRETER 








13: 
ù736 
13 A3 27 RESTTY LDAIM $27 
2 8D 32 FA STA PBD 
8 AS 29 LDAIM SJJ 
FFOA 8D 89 FA STA PAD 
FFGD A9 7 LDAIM SJF 
FFOF &D 81 FA STA PADD 
FEI? dA LSRA 
FFi3 BD 83 FA STA PRDD 
FEIG 69 RTS 
kkkkkkAkhnkkARkkAkAAAkAkkkkAAAk ARA ARK HK 
*KKBREAK TEST DURING BASIC OUTPUT *** 
kkk HAAkAKAERiNKAkAAARAAAAA AHA ARK KH 
FrIJ AO 2E BASBRK LDAIM BASTST SET BASIC'S BREAK VECTOR 
FF19 8D 75 FA STA BRKT 
FFIC A9 FF LDAIM BASTST /256 
FEE 8D 7E FA STA BRKT +81 
FF21 A9 Jg LDAIM MON IF NMI BREAK THEN GOTO HEX DISPLAY MONITOR 
G76H: FF23 8D JA EFA STA NMIL 
P76l: FF26 A9 FC LDAIM MON /256 
Q742: FF28 8D 7B FA STA NMIH 
G163: FF2B 4C 18 FD JMP DKBOOT NOW BOOT UP THE SYSTEM 
A64: 
d765: 
4766: FF2E A9 93 BASTST LDAIM $93 SET BREAK FLAG (CTL-C) 
GTO: FF39 8D 25 23 STA KPDO AND RETURN TO CALLER 
g768: FEF33 68 RTS 
n76d: 
Dd: 
0771: e . 
BIZ: KkkkRKKAkAkkAkkkkkkkkdkkkakkkkAkkkkAkkkkk 
B773: K*KBREAK TEST DURING DOS/AS/EM OUTPUT *** 
BTA: kkkkkkAAAAAAkARAkiAkkAAkKRhikkAkAr Akker rKL 
97715: 
5776: Ì 
BIT: FF34 A9 51 DOSBRK LDAIM KERNEL IF BREAK THEN GOTO KERNEL 
0778: FE36 3D 7C FA STA BRKT 
4779: FF39 A9 2A LDAIM KERNEL /256 
UI84: FF3B 8D 7D FA STA BRKT ‚ +1 
2781: FF3E A9 49 LDAIM MON IF NMI BREAK THEN GOTO HEX DISPLAY MONITOR 
A82: FEF4Z 3D JA FA STA NMIL 
0783: FF43 A9 FC LDAIM MON /256 


3784: FF45 8D 7B FA STA _NMIH 
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4799; 


J8d: 
GB8: 
DEU: 
9803: 
B8ED4: 
G895: 
A86: 
4807: 
9808: 
80e: 
3815: 
2811: 
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JMP 


DKBOOT 


NOW BOOT UP THE SYSTEM 


KAKINDIRECT INTERRUPT VECTORS *** 


INDNMI JMI 
INDIRQ JMI 


NMIL 
IRQL 


kkk AAiAAARAAA IKEA AAR KAA AAA KAAR KAREN KAA A AHK} 


kkk INITIALIZE BOCTSTRAP FOR OSI MODIFICATION*** 
Kkkkkkkkkkhkkkhkkkkkkkkkkkkkkkkkkkkkk hhh kkk 


FIRSTX JSR 
LDA IM 
STA 
LDA IM 
STA 
JSR 
LDA IM 
STA 
JSR 
STX 
JSR 
LDA IM 
STA 
STA 
STA 
JSR 
LDA IM 
STA 
STA 
LDA IM 
STA 
STA 
LDA IM 
STA 
STA 
STA 
STA 
RTS 


FIRSTY INC 


SIGMA 
$28 
STRATE 
S01 
SECTNM 
SETTK 
S2A 
MEMHI 
LDHEAD 
MEMLO 
READDK 
S01 
INDST 
OUTDST 
DSTX 
SETDRV 
RECCHA 
INVEC 
INVECA 
PRCHA 
OUTVEC 
OUT VCA 
RECCHA 
INVEC 
INVECA 
OUTVEC 
OUTVCA 


SECTNM 


INIT THE DOS COMPUTER 1/0 
SETP RATE DELAY 


TRACK=I /SECTOR=1 

SAVE SECTOR NUMBER 

MOVE HEAD ON TRACK 1 

THE LOAD VECTOR IS S2A09 
SAVE IT 

LOAD THE HEAD 


READ TRACK 1/SECTOR 2 

SET FOR DRIVE A AND THE DISTRIBUTOR 
INPUT DISTRIBUTOR 

OUTPUT DISTRIBUTOR 

COMMON DISTRIBUTOR 


-1 
SET PRINTER INPUT VECTOR 


-g1 
SET PRINTER OUTPUT VECTOR 


/256 HIGH ORDER ADDRESS OF RECCHA&PRCHA 
+01 
+01 
+01 
+Ú1 


SECTOR NUMBER IS 2 
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EF A3 96 LDAIM S96 TRACK=ÄG 
Fr 29 BC 26 JSR SETTK MOVE HEAD ON TRACK @6 
P 28 ef 29 JSR READDK READ TRACK OS/SECTOR 2 
EE BE 26 INC SECTNM SECTNM=3 
A3 37 LDAIM S09 LOAD VECTOR =£2400 
35 FE STA MEMLO 
5 FF STA MEMHI 
24 Gt 29 JSR READDK READ TRACK G6/SECTOR 3 


LDAIM SĲl SECTNM=l 


we 
ER 
La 














3 SE 26 STA SECTNM 
PPB6 AS 13 LDAIM $13 TRACK=l 3 
EFBS 28 BC 26 JSR SETTK MOVE HEAD ON TRACK 13 
EFEFBB AS 22 LDAIM $32 SET LOAD POINTER TO $3274 
FEFBD 85 FF STA MEMELI 
FFBF A9 74 LDAIM S74 
FFC 835 PE STA MEMLO 
F ZA 54 27 JSR LDHEAD 
F 6 24 67 29 SR READDK READ TRACK 13/SECTOR 1 
FFC9 24 el 27 FIRSTZ JSR UNLDHD UNLOAD THE HEAD 
FECC 2d 73 2D JSR sSTROUT 


FFCE JD Ee $9D 

EFD9 GA en SOA CRLF 
FPDI 2A = ze 
FFD2 54 e 'T 
FED} 52 e= 'R 


: FFD4 41 n 

RGO: FFDS 43 = en 

379: FED6 48 = IK 

Ä8TL: FEDY 2@ = , 
B872: EFFDB 32 = 'g 
9873: FFD9 26 = rs 
ORT4: FEDA 31 == EL 
2875: FEFDB 2A = td 
9876: EEDC #D = SID 
ORI: EFDD GA = SOA 
A87 EEDE 49 = $0g 
ge73: 
0889: FEDE 4C 98 FC JMP RESET GOTO HEX DISPLAY MONITOR 
Bal: 
U8E2 
G8E8: kkkkkAAAAAAAAHAAAA ARA k AAA ARK KK 


*AKBOOT OS 65D V3,1 FROM HERE *** 
kkkkARAkAkkRikhkkkkkkkkkikkkkkkkk 


0884: 


FEE2 24 5Ì FE VONE JSR FIRSTX 
FFE5 4C Cà FF JMP FIRSTZ 





ge85: 
9896: 
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0897: 
d898: 
g899: 
gg: 
4991: 
…982: FFE8 
4283: FFEB 
ded: 
79g5: 
8976: 

el 


SYMBOL 
ACR 
AHOLD 
BASTST 
CACIA 
CNTC 
CNTF 
CNTHL 
CONVD 
DACIA 
DDRB 
DKBOOT 
DSTX 
EDE TC 
FIRSTX 
GETKEY 
IFR 
INDEXP 
INH 
INVEC 
KERNEL 
KEYINC 
LDHEAD 
MEMLO 
NM IH 
ORA 
OUTVEC 
PBD 
POINTL 
PRC 
READDK 
RECCHA 
RPAGE 
SCDSB 
SHOW 
START 
STEPLO 
STRTBT 
TALL 
TEMPA 
TRKO 
=TL 


29 51 FF 
4C 9A FF 


TABLE 34 
F8&9B 
2363 
FF2E 
COLD 
FAF6 
FAFD 
FASC 
FCCB 
CH11 
F892 
FD18 
2AC6 
FAEG6 
FES51 
FCEL 
F80D 
FD76 
ogFg 
2301 
2A51 
FD] 
2754 
OGFE 
FA7B 
F891 
2311 
FA82 
AFA 
FEF2 
23967 
FE1B 
FDA 4 
FC98 
FCB8 
FCOD 
FD53 
FDF 4 
F8g4 
FA69 
FDSC 
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Eke Rekken kkk kk kkk 


*K*BOOT OS-65D V3,3 FROM HERE *** 
KkkkkkkAkAAAAAhkkkA AKA kkk kkk kk 


VTHREE JSR _ FIRSTX 
JMP _ FIRSTY 
Be 37Cg 
ADDRES FC6A _ ADLOOP FC6C __ADMODE 
AK FC9D AKA __ FCA3 _ BASBRK 
BOOT _FD4F __ BRKT FAJC _BRKTST 
CHA __ FA62 __CNTA _FAF4 _CNTB 
CNTD _ FAF7 __CNTDN FEBD _ CNTE 
CNTG _ FAFE _ CNTH _FAFF ___CNTHH 
CNTHX FASB __ CNTLX FA5A __ COMTIM 
CRA _C991 CRB _ C933 CTS 
DAMODE FC35 DATA _FC57 _ DDRA 
DELAY FCD? _ DELBIT FE&1 DELHBT 
DOSBRK FF34 _ DRA  CO48 _DRB 
DUMMY FDCE _ EDETA FAE4 _ EDETB 
EDETD FAE7 _ FDELA FDBC _ FDELAY 
FIRSTY FF9A _ FIRSTZ FFC9 _ GETKEA 
GOEXEC FC29 __GOKERN FEFD _ IER 
ILLKEY FC53 INDBEG FD7E INDEND 
INDIRQ FF4E INDNMI FF4B INDST 
INIDSK FD28 _ INITPR FDCF INL 
INVECA 2303 IRQH _ FA7F IRQL 
KEYIN FCFÌ _ KEYINA FCF3 _ KEYINB 
KEYIND FD24 KEY __ B2FE __ KPDO 
LODVEC OOFD LOOK FD98 _ MEMHI 
MODE _BEFD MON _ FCO9 _NIBBLE 
NMIL FAJA _ ONEKEY FCAl _ ORAA 
ORB F899 _ OUTDST 2322 _ OUTVCA 
PADD FA81 PAD _ FA89 PBDD 
PCKEY FC4C PCR _F89C POINTH 
PRA _ FEBD _ PRB FECA __PRCHA 
PRD _ FED3 _RBYTE FDC5 _RDFLAG 
RECA FE28 __RECB FE39 _ RECC 
RECD FE2B RESET FC80 _ RESTTY 
SCAND FC7C _ SCANDS FC82 __ SCDSA 
SECTNM 265E _ SETDRV 29C6 _ SETTK 
SIGMA FDIE SR F80A STARA 
STARTA FCOE STEP FC3F _ STEPA 
STPBIT FA59 _ STRATE 26A3 _ STROUT 
TAALH F897 _ TAALL F806 _ TACH 
TBCH _F809 _ TBLCL F808 _ TEMP 
TEMPB FA6l —_ TIMH _FASF __TIML 
UNLDHD 2761 _ VONE FFE2 _ VTHREE 


FC2B 
PE17 
FEEA 
FAFS5S 
FAFC 
FASD 
FE4F 
FEA9 
F893 
FE72 
CO72 
FAES 
FDBA 
FCE3 
F8OE 
FD83 
2321 
gorg8 
FA7E 
FCF9 
2325 
OUFF 
OIFE 
F8gF 
2313 
FA83 
OGFB 
FEA3 
FADS5 
FE4Q 
EFS 

FC89 
26BC 
FC13 
FC49 
2D 73 
F8g5 
agr 
FASE 
FFES8 


SYMBOL TABLE 3429 37C0 





INL ggrg erg POINTL 99FA POINTH GOFB 
TEMP GERT BEFD MODE BIED MEMLO (JZOFE 
NIBBLE BIFE MEMHI GOFF INVEC 2391 
INVECA 231 OUTVCA 23513 INDST 2321 
GUEDST PDC 2325 AHOLD 2363 SECTNM 265E 
STRATE SETTK 26BC LDHEAD 2754 UNLDHD 2761 
READDK SETDRV 29C6 KERNEL 2ADÌ DSTX 2AC6 
5 TROUT DRA COO CRA COOL DRE Ci 
CRB CACIA C419 DACIA C@1Ì ORB FAOg 
ORA DDRB F8g2 DDRA F8g3 TALL F804 
TACH TAALL F896 TAALH F897 TBLCL F808 
TBCH SR F84A ACR F80B8 PCR F89C 
EFR IER F8OE ORAA F8gF STPBIT FA59 
CHTLX CNTHX FAS5B CNTHL FAB5C CNTHH FASD 
PIML TIMH FASF TEMPA FA6G TEMPB FA6Gl 
CHA NMIL FAJA NM IH FA7B BRKT FA7C 
IRQ IROH FAJF PAD FA89 PADD FA8I 
PBD P2DD FA83 RDFLAG FADS EDETA FAE4 
EDETE EDETC FAE6 EDETD FAE7 CNTA FAF 4 
ONTB CNTC FAFG6 CNTD FAF7 CNTE FAFC 
CNTE CNTG FAFE CNTH FAFF MON FCÓg 
RESET START FCOD STARTA FCUE STARA FC13 
GOEXEC ADMODE FC2B DAMODE FC35 STEP FC3F 
STEPA PCKEY FC4C ILLKEY FC53 DATA FC57 
ADDRES ADLOOP FC6C SCAND FC7C SCANDS FC82 
SCDSA SCDSB FC98 AK FCO9D ONEKEY FCAI 
AKA SHOW FCB8 CONVD FCCB DELAY EFCD7 
GETKE Y GETKEA FCE3 KEYIN PFCFÌ KEYINA FCF3 
KEYINB KEYINC FDO1 KEYIND FD94 LOOK FD98 
DKBOOT SIGMA FDIE INIDSK FD28 BOOT FD4F 
sSTEPLO TRKO FD5C INDEXP FD76 INDBEG FD7E 
INDEND RPAGE FDA4 FDELAY FDBA FDELA FDBC 
RBYTE DUMMY FDCE INITPR FDCF STRTBT FDF 4 
RECCHA RECA FE28 RECD FE2B RECB FE393 
RECC COMTIM FE4F DELHBT FE72 DELBIT FE81 
CNTDN FESD PRCHA FEA3 CTS FEAS9 PRA FEBD 
PRB FECA PRD FED3 BRKTST FEEA PRC FEF2 
GOKERN FEFD RESTTY FF93 BASBRK FF17 BASTST FF2E 
DOSBRK FF 34 INDNMI FF4B INDIRG FF4E FIRSTX FF51 
FIRSTY FF9A FIRSTZ EFFC9 VONE FFE2 VTHREE FFE8 


ek 
8DB9 4997 


